cond
*.nrg 2999 >
*22 0 =
start
7 22 store
stop

cond
*22 0 >
start
-1 *22 add 22 store
stop

cond
*22 6 =
start
50 .repro store
stop

cond
*22 5 =
start
13 .tie store
stop

cond
*22 4 =
start
314 .aimdx store
stop

cond
*22 3 =
start
*22 971 store
50 .repro store
stop

cond
*22 1 =
start
24 .tie store
stop


cond
*.robage 0 =
start
1 .deltie store
stop

cond
*.robage 10 >
*23 0 =
start
5 23 store
stop

cond
*23 0 >
start
-1 *23 add 23 store
stop

cond
*23 4 =
start
13 .readtie store
24 .tiepres  store
stop

cond
*23 3 =
start
500 .fixlen store
stop

cond
*23 2 =
start
24 .readtie store
stop




'here we go...

cond
start
100
.tout1
store
200
.tout2
store
300
.tout3
store
400
.tout4
store
500
.tout5
store
600
.tout6
store
700
.tout7
store
800
.tout8
store
900
.tout9
store
1000
.tout10
store
stop


cond
start
*.tin1
0
sub
*.tin2
0
sub
*.tin3
0
sub
*.tin4
0
sub
*.tin5
0
sub
*.tin6
0
sub
*.tin7
0
sub
*.tin8
0
sub
*.tin9
0
sub
*.tin10
0
sub
stop
end
